inherited fmPiView: TfmPiView
  Caption = #35746#21333
  OnCreate = FormCreate
  ExplicitWidth = 800
  ExplicitHeight = 600
  PixelsPerInch = 96
  TextHeight = 13
  inherited lcMain: TdxLayoutControl
    object grdProduct: TcxGrid [0]
      Left = 6
      Top = 165
      Width = 796
      Height = 100
      TabOrder = 1
      LookAndFeel.Kind = lfOffice11
      object tvProduct: TcxGridTableView
        Navigator.Buttons.CustomButtons = <>
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsSelection.CellSelect = False
        OptionsView.Footer = True
        OptionsView.GroupByBox = False
      end
      object lvProduct: TcxGridLevel
        GridView = tvProduct
      end
    end
    object grdTrace: TcxGrid [1]
      Left = 6
      Top = 302
      Width = 796
      Height = 100
      TabOrder = 2
      LookAndFeel.Kind = lfOffice11
      object tvTrace: TcxGridTableView
        Navigator.Buttons.CustomButtons = <>
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsSelection.CellSelect = False
        OptionsView.GroupByBox = False
      end
      object lvTrace: TcxGridLevel
        GridView = tvTrace
      end
    end
    object grdStock: TcxGrid [2]
      Left = 6
      Top = 28
      Width = 796
      Height = 100
      TabOrder = 0
      LookAndFeel.Kind = lfOffice11
      object tvStock: TcxGridTableView
        OnDblClick = tvStockDblClick
        Navigator.Buttons.CustomButtons = <>
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsSelection.CellSelect = False
        OptionsView.GroupByBox = False
      end
      object lvStock: TcxGridLevel
        GridView = tvStock
      end
    end
    object grdReceivable: TcxGrid [3]
      Left = 6
      Top = 576
      Width = 796
      Height = 100
      TabOrder = 4
      LookAndFeel.Kind = lfOffice11
      object tvReceivable: TcxGridTableView
        OnDblClick = tvReceivableDblClick
        Navigator.Buttons.CustomButtons = <>
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsSelection.CellSelect = False
        OptionsView.GroupByBox = False
      end
      object lvReceivable: TcxGridLevel
        GridView = tvReceivable
      end
    end
    object grdPayable: TcxGrid [4]
      Left = 6
      Top = 713
      Width = 796
      Height = 100
      TabOrder = 5
      LookAndFeel.Kind = lfOffice11
      object tvPayable: TcxGridTableView
        OnDblClick = tvPayableDblClick
        Navigator.Buttons.CustomButtons = <>
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsSelection.CellSelect = False
        OptionsView.GroupByBox = False
      end
      object lvPayable: TcxGridLevel
        GridView = tvPayable
      end
    end
    object grdTransport: TcxGrid [5]
      Left = 6
      Top = 439
      Width = 796
      Height = 100
      TabOrder = 3
      LookAndFeel.Kind = lfOffice11
      object tvTransport: TcxGridTableView
        Navigator.Buttons.CustomButtons = <>
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsSelection.CellSelect = False
        OptionsView.GroupByBox = False
      end
      object lvTransport: TcxGridLevel
        GridView = tvTransport
      end
    end
    object RzDBEdit1: TRzDBEdit [6]
      Left = 71
      Top = 874
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_csimpname'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 7
    end
    object RzDBEdit2: TRzDBEdit [7]
      Left = 304
      Top = 850
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_date'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 12
    end
    object RzDBEdit3: TRzDBEdit [8]
      Left = 513
      Top = 850
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_pno'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 18
    end
    object RzDBEdit4: TRzDBEdit [9]
      Left = 710
      Top = 850
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_osimpname'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 24
    end
    object RzDBEdit5: TRzDBEdit [10]
      Left = 710
      Top = 874
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_totalqty'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 25
    end
    object RzDBEdit6: TRzDBEdit [11]
      Left = 513
      Top = 874
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_delidate'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 19
    end
    object RzDBEdit7: TRzDBEdit [12]
      Left = 304
      Top = 874
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_productname'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 13
    end
    object RzDBEdit8: TRzDBEdit [13]
      Left = 71
      Top = 850
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_no'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 6
    end
    object RzDBEdit9: TRzDBEdit [14]
      Left = 71
      Top = 898
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_amt'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 8
    end
    object RzDBEdit11: TRzDBEdit [15]
      Left = 304
      Top = 898
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_mcode'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 14
    end
    object RzDBEdit13: TRzDBEdit [16]
      Left = 513
      Top = 898
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_followstate'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 20
    end
    object RzDBEdit15: TRzDBEdit [17]
      Left = 710
      Top = 898
      Width = 121
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_followdate'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 26
    end
    object RzDBNumericEdit1: TRzDBNumericEdit [18]
      Left = 71
      Top = 922
      Width = 65
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_receivableamt'
      Alignment = taLeftJustify
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 9
      IntegersOnly = False
      DisplayFormat = ',0.00;(,0.00)'
    end
    object RzDBNumericEdit2: TRzDBNumericEdit [19]
      Left = 304
      Top = 922
      Width = 65
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_outamt'
      Alignment = taLeftJustify
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 15
      IntegersOnly = False
      DisplayFormat = ',0.00;(,0.00)'
    end
    object RzDBNumericEdit3: TRzDBNumericEdit [20]
      Left = 513
      Top = 922
      Width = 65
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_notoutamt'
      Alignment = taLeftJustify
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 21
      IntegersOnly = False
      DisplayFormat = ',0.00;(,0.00)'
    end
    object RzDBNumericEdit4: TRzDBNumericEdit [21]
      Left = 71
      Top = 946
      Width = 65
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_invoiceamt'
      Alignment = taLeftJustify
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 10
      IntegersOnly = False
      DisplayFormat = ',0.00;(,0.00)'
    end
    object RzDBNumericEdit5: TRzDBNumericEdit [22]
      Left = 304
      Top = 946
      Width = 65
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_notinvoiceamt'
      Alignment = taLeftJustify
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 16
      IntegersOnly = False
      DisplayFormat = ',0.00;(,0.00)'
    end
    object RzDBNumericEdit6: TRzDBNumericEdit [23]
      Left = 513
      Top = 946
      Width = 65
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_prereceivableamt'
      Alignment = taLeftJustify
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 22
      IntegersOnly = False
      DisplayFormat = ',0.00;(,0.00)'
    end
    object RzDBNumericEdit7: TRzDBNumericEdit [24]
      Left = 71
      Top = 970
      Width = 65
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_receivedamt'
      Alignment = taLeftJustify
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 11
      IntegersOnly = False
      DisplayFormat = ',0.00;(,0.00)'
    end
    object RzDBNumericEdit8: TRzDBNumericEdit [25]
      Left = 304
      Top = 970
      Width = 65
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_notreceivedamt'
      Alignment = taLeftJustify
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 17
      IntegersOnly = False
      DisplayFormat = ',0.00;(,0.00)'
    end
    object RzDBMemo1: TRzDBMemo [26]
      Left = 710
      Top = 922
      Width = 121
      Height = 60
      BorderStyle = bsNone
      DataField = 'tdp_receiveinfo'
      DataSource = dsBase
      TabOrder = 27
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
    end
    object RzDBEdit10: TRzDBEdit [27]
      Left = 513
      Top = 970
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'tdp_cpino'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = []
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 23
    end
    inherited lcgRoot: TdxLayoutGroup
      Index = -1
    end
    inherited lcgBaseInfo: TdxLayoutGroup
      CaptionOptions.Text = #35746#21333#22522#26412#20449#24687
      Index = 6
    end
    inherited lcgBaseInfoLeft: TdxLayoutGroup
      CaptionOptions.Visible = False
      ShowBorder = False
      Index = 0
    end
    inherited lcgBaseInfoMiddle: TdxLayoutGroup
      CaptionOptions.Visible = False
      ShowBorder = False
      Index = 1
    end
    inherited lcgBaseInfoRight: TdxLayoutGroup
      CaptionOptions.Visible = False
      ShowBorder = False
      Index = 2
    end
    inherited lcgBaseInfoLast: TdxLayoutGroup
      Index = 3
    end
    object lcMainItem14: TdxLayoutItem
      CaptionOptions.Text = #35746#21333#21333#21495
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoLeft
      Control = RzDBEdit8
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcMainItem7: TdxLayoutItem
      CaptionOptions.Text = #23458#25143
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoLeft
      Control = RzDBEdit1
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object lcMainItem15: TdxLayoutItem
      CaptionOptions.Text = #24635#37329#39069
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoLeft
      Control = RzDBEdit9
      ControlOptions.ShowBorder = False
      Index = 2
    end
    object lcMainItem23: TdxLayoutItem
      CaptionOptions.Text = #24212#25910#27454
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoLeft
      Control = RzDBNumericEdit1
      ControlOptions.ShowBorder = False
      Index = 3
    end
    object lcMainItem26: TdxLayoutItem
      CaptionOptions.Text = #24050#24320#31080#37329#39069
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoLeft
      Control = RzDBNumericEdit4
      ControlOptions.ShowBorder = False
      Index = 4
    end
    object lcMainItem29: TdxLayoutItem
      CaptionOptions.Text = #24050#25910#27454#37329#39069
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoLeft
      Control = RzDBNumericEdit7
      ControlOptions.ShowBorder = False
      Index = 5
    end
    object lcMainItem8: TdxLayoutItem
      CaptionOptions.Text = #38144#21806#26085#26399
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoMiddle
      Control = RzDBEdit2
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcMainItem13: TdxLayoutItem
      CaptionOptions.Text = #35746#21333#25688#35201
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoMiddle
      Control = RzDBEdit7
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object lcMainItem17: TdxLayoutItem
      CaptionOptions.Text = #24065#21035
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoMiddle
      Control = RzDBEdit11
      ControlOptions.ShowBorder = False
      Index = 2
    end
    object lcMainItem24: TdxLayoutItem
      CaptionOptions.Text = #24050#20986#36135#37329#39069
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoMiddle
      Control = RzDBNumericEdit2
      ControlOptions.ShowBorder = False
      Index = 3
    end
    object lcMainItem27: TdxLayoutItem
      CaptionOptions.Text = #20986#24211#26410#24320#31080#37329#39069
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoMiddle
      Control = RzDBNumericEdit5
      ControlOptions.ShowBorder = False
      Index = 4
    end
    object lcMainItem16: TdxLayoutItem
      CaptionOptions.Text = #23578#27424#27454
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoMiddle
      Control = RzDBNumericEdit8
      ControlOptions.ShowBorder = False
      Index = 5
    end
    object lcMainItem9: TdxLayoutItem
      CaptionOptions.Text = #39033#30446#21495
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoRight
      Control = RzDBEdit3
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcMainItem12: TdxLayoutItem
      CaptionOptions.Text = #20132#36135#26399
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoRight
      Control = RzDBEdit6
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object lcMainItem19: TdxLayoutItem
      CaptionOptions.Text = #23436#25104#29366#24577
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoRight
      Control = RzDBEdit13
      ControlOptions.ShowBorder = False
      Index = 2
    end
    object lcMainItem25: TdxLayoutItem
      CaptionOptions.Text = #26410#20986#36135#37329#39069
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoRight
      Control = RzDBNumericEdit3
      ControlOptions.ShowBorder = False
      Index = 3
    end
    object lcMainItem28: TdxLayoutItem
      CaptionOptions.Text = #39044#25910#27454#37329#39069
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoRight
      Control = RzDBNumericEdit6
      ControlOptions.ShowBorder = False
      Index = 4
    end
    object lcMainItem20: TdxLayoutItem
      CaptionOptions.Text = #23458#25143#35746#21333#21495
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoRight
      Control = RzDBEdit10
      ControlOptions.ShowBorder = False
      Index = 5
    end
    object lcMainItem10: TdxLayoutItem
      CaptionOptions.Text = #20844#21496
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoLast
      Control = RzDBEdit4
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcMainItem11: TdxLayoutItem
      CaptionOptions.Text = #24635#25968#37327
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoLast
      Control = RzDBEdit5
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object lcMainItem21: TdxLayoutItem
      CaptionOptions.Text = #26356#26032#26102#38388
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoLast
      Control = RzDBEdit15
      ControlOptions.ShowBorder = False
      Index = 2
    end
    object lcMainItem18: TdxLayoutItem
      CaptionOptions.Text = #25910#27454#24773#20917
      LayoutLookAndFeel = dmImages.lfView
      Parent = lcgBaseInfoLast
      Control = RzDBMemo1
      Index = 3
    end
    object lcgProducts: TdxLayoutGroup
      CaptionOptions.Text = #35746#21333#20135#21697#20449#24687
      LayoutLookAndFeel = dmImages.lfBaseInfoGroups
      Parent = lcgRoot
      ButtonOptions.Buttons = <>
      OnCaptionClick = lcgBaseInfoCaptionClick
      Index = 1
    end
    object lcMainItem1: TdxLayoutItem
      Parent = lcgProducts
      Control = grdProduct
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcgTrace: TdxLayoutGroup
      CaptionOptions.Text = #35746#21333#36319#36394#20449#24687
      LayoutLookAndFeel = dmImages.lfBaseInfoGroups
      Parent = lcgRoot
      ButtonOptions.Buttons = <>
      OnCaptionClick = lcgBaseInfoCaptionClick
      Index = 2
    end
    object lcMainItem2: TdxLayoutItem
      Parent = lcgTrace
      Control = grdTrace
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcgStock: TdxLayoutGroup
      CaptionOptions.Text = #37319#36141#21333'(*)'
      LayoutLookAndFeel = dmImages.lfBaseInfoGroups
      Parent = lcgRoot
      ButtonOptions.Buttons = <>
      OnCaptionClick = lcgBaseInfoCaptionClick
      Index = 0
    end
    object lcMainItem3: TdxLayoutItem
      Parent = lcgStock
      Control = grdStock
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcgReceivable: TdxLayoutGroup
      CaptionOptions.Text = #24212#25910#24773#20917'(*)'
      LayoutLookAndFeel = dmImages.lfBaseInfoGroups
      Parent = lcgRoot
      ButtonOptions.Buttons = <>
      OnCaptionClick = lcgBaseInfoCaptionClick
      Index = 4
    end
    object lcMainItem4: TdxLayoutItem
      Parent = lcgReceivable
      Control = grdReceivable
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcgPayable: TdxLayoutGroup
      CaptionOptions.Text = #24212#20184#24773#20917'(*)'
      LayoutLookAndFeel = dmImages.lfBaseInfoGroups
      Parent = lcgRoot
      ButtonOptions.Buttons = <>
      OnCaptionClick = lcgBaseInfoCaptionClick
      Index = 5
    end
    object lcMainItem5: TdxLayoutItem
      Parent = lcgPayable
      Control = grdPayable
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcgTransport: TdxLayoutGroup
      CaptionOptions.Text = #29289#27969#36816#36755
      LayoutLookAndFeel = dmImages.lfBaseInfoGroups
      Parent = lcgRoot
      Visible = False
      ButtonOptions.Buttons = <>
      OnCaptionClick = lcgBaseInfoCaptionClick
      Index = 3
    end
    object lcMainItem6: TdxLayoutItem
      Parent = lcgTransport
      Control = grdTransport
      ControlOptions.ShowBorder = False
      Index = 0
    end
  end
  inherited dsBase: TDADataSource
    DataSet = tblBase.Dataset
  end
  inherited rdaBase: TDARemoteDataAdapter
    GetDataCall.Params = <
      item
        Name = 'Result'
        DataType = rtBinary
        Flag = fResult
      end
      item
        Name = 'aSQLText'
        DataType = rtString
        Flag = fIn
      end
      item
        Name = 'aIncludeSchema'
        DataType = rtBoolean
        Flag = fIn
      end
      item
        Name = 'aMaxRecords'
        DataType = rtInteger
        Flag = fIn
      end>
  end
end
